home *** CD-ROM | disk | FTP | other *** search
/ J-Mac Electronics & Home Comics / J-Mac Electronics & Home Comics.iso / mac / J-MAC / G14F / G14_SAGA.Dxr / 00044.ls < prev    next >
Encoding:
Text File  |  1998-01-22  |  2.3 KB  |  123 lines
  1. global i, g_no, jumplistkey
  2.  
  3. on startMovie
  4.   set mycursor to [1, 2]
  5.   set the cursor of sprite 11 to mycursor
  6.   set the cursor of sprite 12 to mycursor
  7.   repeat with i = 14 to 19
  8.     set the cursor of sprite i to mycursor
  9.   end repeat
  10.   set jumplistkey to ["G1", "G2", "G3"]
  11.   set volset to the soundLevel
  12.   if the soundEnabled = 0 then
  13.     set the soundEnabled to 1
  14.   end if
  15. end
  16.  
  17. on donext
  18.   if (g_no + 1) = 4 then
  19.     set g_no to 0
  20.   end if
  21.   go(getAt(jumplistkey, g_no + 1))
  22. end
  23.  
  24. on doback
  25.   if (g_no - 1) = 0 then
  26.     set g_no to 4
  27.   end if
  28.   go(getAt(jumplistkey, g_no - 1))
  29. end
  30.  
  31. on doexit
  32.   sound stop 1
  33.   go("M2", "@::JMACMENU")
  34. end
  35.  
  36. on crtopen
  37.   puppetSprite(6, 1)
  38.   repeat while the stillDown
  39.     set the memberNum of sprite 6 to 8
  40.     updateStage()
  41.   end repeat
  42.   set the memberNum of sprite 6 to 7
  43.   updateStage()
  44.   puppetSprite(6, 0)
  45. end
  46.  
  47. on crtclose
  48.   puppetSprite(7, 1)
  49.   repeat while the stillDown
  50.     set the memberNum of sprite 7 to 10
  51.     updateStage()
  52.   end repeat
  53.   set the memberNum of sprite 7 to 9
  54.   updateStage()
  55.   puppetSprite(7, 0)
  56. end
  57.  
  58. on crtback
  59.   puppetSprite(21, 1)
  60.   repeat while the stillDown
  61.     set the memberNum of sprite 21 to 18
  62.     updateStage()
  63.   end repeat
  64.   set the memberNum of sprite 21 to 17
  65.   updateStage()
  66.   puppetSprite(21, 0)
  67. end
  68.  
  69. on crtnext
  70.   puppetSprite(20, 1)
  71.   repeat while the stillDown
  72.     set the memberNum of sprite 20 to 16
  73.     updateStage()
  74.   end repeat
  75.   set the memberNum of sprite 20 to 15
  76.   updateStage()
  77.   puppetSprite(20, 0)
  78. end
  79.  
  80. on crtclose2
  81.   puppetSprite(22, 1)
  82.   repeat while the stillDown
  83.     set the memberNum of sprite 22 to 20
  84.     updateStage()
  85.   end repeat
  86.   set the memberNum of sprite 22 to 19
  87.   updateStage()
  88.   puppetSprite(22, 0)
  89. end
  90.  
  91. on crtg31
  92.   puppetSprite(23, 1)
  93.   repeat while the stillDown
  94.     set the memberNum of sprite 23 to 22
  95.     updateStage()
  96.   end repeat
  97.   set the memberNum of sprite 23 to 21
  98.   updateStage()
  99.   puppetSprite(23, 0)
  100. end
  101.  
  102. on crtg32
  103.   puppetSprite(24, 1)
  104.   repeat while the stillDown
  105.     set the memberNum of sprite 24 to 24
  106.     updateStage()
  107.   end repeat
  108.   set the memberNum of sprite 24 to 23
  109.   updateStage()
  110.   puppetSprite(24, 0)
  111. end
  112.  
  113. on crtg33
  114.   puppetSprite(25, 1)
  115.   repeat while the stillDown
  116.     set the memberNum of sprite 25 to 26
  117.     updateStage()
  118.   end repeat
  119.   set the memberNum of sprite 25 to 25
  120.   updateStage()
  121.   puppetSprite(25, 0)
  122. end
  123.